home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / doom / quake.zip / HIPGRAPL.ZIP / ENFORCER.QC < prev    next >
Text File  |  1997-01-16  |  11KB  |  357 lines
  1. /*
  2. ==============================================================================
  3.  
  4. SOLDIER / PLAYER
  5.  
  6. ==============================================================================
  7. */
  8.  
  9. $cd id1/models/enforcer
  10. $origin 0 -6 24
  11. $base base
  12. $skin skin
  13.  
  14. $frame stand1 stand2 stand3 stand4 stand5 stand6 stand7
  15.  
  16. $frame walk1 walk2 walk3 walk4 walk5 walk6 walk7 walk8 walk9 walk10
  17. $frame walk11 walk12 walk13 walk14 walk15 walk16
  18.  
  19. $frame run1 run2 run3 run4 run5 run6 run7 run8
  20.  
  21. $frame attack1 attack2 attack3 attack4 attack5 attack6
  22. $frame attack7 attack8 attack9 attack10
  23.  
  24. $frame death1 death2 death3 death4 death5 death6 death7 death8
  25. $frame death9 death10 death11 death12 death13 death14
  26.  
  27. $frame fdeath1 fdeath2 fdeath3 fdeath4 fdeath5 fdeath6 fdeath7 fdeath8
  28. $frame fdeath9 fdeath10 fdeath11
  29.  
  30. $frame paina1 paina2 paina3 paina4
  31.  
  32. $frame painb1 painb2 painb3 painb4 painb5
  33.  
  34. $frame painc1 painc2 painc3 painc4 painc5 painc6 painc7 painc8
  35.  
  36. $frame paind1 paind2 paind3 paind4 paind5 paind6 paind7 paind8
  37. $frame paind9 paind10 paind11 paind12 paind13 paind14 paind15 paind16
  38. $frame paind17 paind18 paind19
  39.  
  40.  
  41. void() Laser_Touch =
  42. {
  43.     local vector org;
  44.  
  45.     if (other == self.owner)
  46.         return;        // don't explode on owner
  47.  
  48.     if (pointcontents(self.origin) == CONTENT_SKY)
  49.     {
  50.         remove(self);
  51.         return;
  52.     }
  53.  
  54. //MED 01/16/97 added silent command
  55.  
  56.    if (!(self.spawnflags & SPAWNFLAG_SILENT))
  57.       sound (self, CHAN_WEAPON, "enforcer/enfstop.wav", 1, ATTN_STATIC);
  58.     org = self.origin - 8*normalize(self.velocity);
  59.  
  60.     if (other.health)
  61.     {
  62.         SpawnBlood (org, self.velocity*0.2, 15);
  63.         T_Damage (other, self, self.owner, 15);
  64.     }
  65.     else
  66.     {
  67.         WriteByte (MSG_BROADCAST, SVC_TEMPENTITY);
  68.         WriteByte (MSG_BROADCAST, TE_GUNSHOT);
  69.         WriteCoord (MSG_BROADCAST, org_x);
  70.         WriteCoord (MSG_BROADCAST, org_y);
  71.         WriteCoord (MSG_BROADCAST, org_z);
  72.     }
  73.  
  74.     remove(self);
  75. };
  76.  
  77. void(vector org, vector vec) LaunchLaser =
  78. {
  79.     local    vector    vec;
  80.  
  81.     if (self.classname == "monster_enforcer")
  82.         sound (self, CHAN_WEAPON, "enforcer/enfire.wav", 1, ATTN_NORM);
  83.  
  84.     vec = normalize(vec);
  85.  
  86.     newmis = spawn();
  87.     newmis.owner = self;
  88.     newmis.movetype = MOVETYPE_FLY;
  89.     newmis.solid = SOLID_BBOX;
  90.     newmis.effects = EF_DIMLIGHT;
  91.  
  92.     setmodel (newmis, "progs/laser.mdl");
  93.     setsize (newmis, '0 0 0', '0 0 0');
  94.  
  95.     setorigin (newmis, org);
  96.  
  97.     newmis.velocity = vec * 600;
  98.     newmis.angles = vectoangles(newmis.velocity);
  99.  
  100.     newmis.nextthink = time + 5;
  101.     newmis.think = SUB_Remove;
  102.     newmis.touch = Laser_Touch;
  103. };
  104.  
  105.  
  106.  
  107. void() enforcer_fire =
  108. {
  109.     local vector org;
  110.  
  111.     self.effects = self.effects | EF_MUZZLEFLASH;
  112.     makevectors (self.angles);
  113.  
  114.     org = self.origin + v_forward * 30 + v_right * 8.5 + '0 0 16';
  115.  
  116.     LaunchLaser(org, self.enemy.origin - self.origin);
  117. };
  118.  
  119. //============================================================================
  120.  
  121. void()    enf_stand1    =[    $stand1,    enf_stand2    ] {ai_stand();};
  122. void()    enf_stand2    =[    $stand2,    enf_stand3    ] {ai_stand();};
  123. void()    enf_stand3    =[    $stand3,    enf_stand4    ] {ai_stand();};
  124. void()    enf_stand4    =[    $stand4,    enf_stand5    ] {ai_stand();};
  125. void()    enf_stand5    =[    $stand5,    enf_stand6    ] {ai_stand();};
  126. void()    enf_stand6    =[    $stand6,    enf_stand7    ] {ai_stand();};
  127. void()    enf_stand7    =[    $stand7,    enf_stand1    ] {ai_stand();};
  128.  
  129. void()    enf_walk1    =[    $walk1 ,    enf_walk2    ] {
  130. if (random() < 0.2)
  131.     sound (self, CHAN_VOICE, "enforcer/idle1.wav", 1, ATTN_IDLE);
  132. ai_walk(2);};
  133. void()    enf_walk2    =[    $walk2 ,    enf_walk3    ] {ai_walk(4);};
  134. void()    enf_walk3    =[    $walk3 ,    enf_walk4    ] {ai_walk(4);};
  135. void()    enf_walk4    =[    $walk4 ,    enf_walk5    ] {ai_walk(3);};
  136. void()    enf_walk5    =[    $walk5 ,    enf_walk6    ] {ai_walk(1);};
  137. void()    enf_walk6    =[    $walk6 ,    enf_walk7    ] {ai_walk(2);};
  138. void()    enf_walk7    =[    $walk7 ,    enf_walk8    ] {ai_walk(2);};
  139. void()    enf_walk8    =[    $walk8 ,    enf_walk9    ] {ai_walk(1);};
  140. void()    enf_walk9    =[    $walk9 ,    enf_walk10    ] {ai_walk(2);};
  141. void()    enf_walk10    =[    $walk10,    enf_walk11    ] {ai_walk(4);};
  142. void()    enf_walk11    =[    $walk11,    enf_walk12    ] {ai_walk(4);};
  143. void()    enf_walk12    =[    $walk12,    enf_walk13    ] {ai_walk(1);};
  144. void()    enf_walk13    =[    $walk13,    enf_walk14    ] {ai_walk(2);};
  145. void()    enf_walk14    =[    $walk14,    enf_walk15    ] {ai_walk(3);};
  146. void()    enf_walk15    =[    $walk15,    enf_walk16    ] {ai_walk(4);};
  147. void()    enf_walk16    =[    $walk16,    enf_walk1    ] {ai_walk(2);};
  148.  
  149. void()    enf_run1    =[    $run1  ,    enf_run2    ] {
  150. if (random() < 0.2)
  151.     sound (self, CHAN_VOICE, "enforcer/idle1.wav", 1, ATTN_IDLE);
  152. ai_run(18);};
  153. void()    enf_run2    =[    $run2  ,    enf_run3    ] {ai_run(14);};
  154. void()    enf_run3    =[    $run3  ,    enf_run4    ] {ai_run(7);};
  155. void()    enf_run4    =[    $run4  ,    enf_run5    ] {ai_run(12);};
  156. void()    enf_run5    =[    $run5  ,    enf_run6    ] {ai_run(14);};
  157. void()    enf_run6    =[    $run6  ,    enf_run7    ] {ai_run(14);};
  158. void()    enf_run7    =[    $run7  ,    enf_run8    ] {ai_run(7);};
  159. void()    enf_run8    =[    $run8  ,    enf_run1    ] {ai_run(11);};
  160.  
  161. void()    enf_atk1    =[    $attack1,    enf_atk2    ] {ai_face();};
  162. void()    enf_atk2    =[    $attack2,    enf_atk3    ] {ai_face();};
  163. void()    enf_atk3    =[    $attack3,    enf_atk4    ] {ai_face();};
  164. void()    enf_atk4    =[    $attack4,    enf_atk5    ] {ai_face();};
  165. void()    enf_atk5    =[    $attack5,    enf_atk6    ] {ai_face();};
  166. void()    enf_atk6    =[    $attack6,    enf_atk7    ] {enforcer_fire();};
  167. void()    enf_atk7    =[    $attack7,    enf_atk8    ] {ai_face();};
  168. void()    enf_atk8    =[    $attack8,    enf_atk9    ] {ai_face();};
  169. void()    enf_atk9    =[    $attack5,    enf_atk10    ] {ai_face();};
  170. void()    enf_atk10    =[    $attack6,    enf_atk11    ] {enforcer_fire();};
  171. void()    enf_atk11    =[    $attack7,    enf_atk12    ] {ai_face();};
  172. void()    enf_atk12    =[    $attack8,    enf_atk13    ] {ai_face();};
  173. void()    enf_atk13    =[    $attack9,    enf_atk14    ] {ai_face();};
  174. void()    enf_atk14    =[    $attack10,    enf_run1    ] {ai_face();
  175. SUB_CheckRefire (enf_atk1);
  176. };
  177.  
  178. void()    enf_paina1    =[    $paina1,    enf_paina2    ] {};
  179. void()    enf_paina2    =[    $paina2,    enf_paina3    ] {};
  180. void()    enf_paina3    =[    $paina3,    enf_paina4    ] {};
  181. void()    enf_paina4    =[    $paina4,    enf_run1    ] {};
  182.  
  183. void()    enf_painb1    =[    $painb1,    enf_painb2    ] {};
  184. void()    enf_painb2    =[    $painb2,    enf_painb3    ] {};
  185. void()    enf_painb3    =[    $painb3,    enf_painb4    ] {};
  186. void()    enf_painb4    =[    $painb4,    enf_painb5    ] {};
  187. void()    enf_painb5    =[    $painb5,    enf_run1    ] {};
  188.  
  189. void()    enf_painc1    =[    $painc1,    enf_painc2    ] {};
  190. void()    enf_painc2    =[    $painc2,    enf_painc3    ] {};
  191. void()    enf_painc3    =[    $painc3,    enf_painc4    ] {};
  192. void()    enf_painc4    =[    $painc4,    enf_painc5    ] {};
  193. void()    enf_painc5    =[    $painc5,    enf_painc6    ] {};
  194. void()    enf_painc6    =[    $painc6,    enf_painc7    ] {};
  195. void()    enf_painc7    =[    $painc7,    enf_painc8    ] {};
  196. void()    enf_painc8    =[    $painc8,    enf_run1    ] {};
  197.  
  198. void()    enf_paind1    =[    $paind1,    enf_paind2    ] {};
  199. void()    enf_paind2    =[    $paind2,    enf_paind3    ] {};
  200. void()    enf_paind3    =[    $paind3,    enf_paind4    ] {};
  201. void()    enf_paind4    =[    $paind4,    enf_paind5    ] {ai_painforward(2);};
  202. void()    enf_paind5    =[    $paind5,    enf_paind6    ] {ai_painforward(1);};
  203. void()    enf_paind6    =[    $paind6,    enf_paind7    ] {};
  204. void()    enf_paind7    =[    $paind7,    enf_paind8    ] {};
  205. void()    enf_paind8    =[    $paind8,    enf_paind9    ] {};
  206. void()    enf_paind9    =[    $paind9,    enf_paind10    ] {};
  207. void()    enf_paind10    =[    $paind10,    enf_paind11    ] {};
  208. void()    enf_paind11    =[    $paind11,    enf_paind12    ] {ai_painforward(1);};
  209. void()    enf_paind12    =[    $paind12,    enf_paind13    ] {ai_painforward(1);};
  210. void()    enf_paind13    =[    $paind13,    enf_paind14    ] {ai_painforward(1);};
  211. void()    enf_paind14    =[    $paind14,    enf_paind15    ] {};
  212. void()    enf_paind15    =[    $paind15,    enf_paind16    ] {};
  213. void()    enf_paind16    =[    $paind16,    enf_paind17    ] {ai_pain(1);};
  214. void()    enf_paind17    =[    $paind17,    enf_paind18    ] {ai_pain(1);};
  215. void()    enf_paind18    =[    $paind18,    enf_paind19    ] {};
  216. void()    enf_paind19    =[    $paind19,    enf_run1    ] {};
  217.  
  218. void(entity attacker, float damage)    enf_pain =
  219. {
  220.     local float r;
  221.  
  222.     r = random ();
  223.     if (self.pain_finished > time)
  224.         return;
  225.  
  226.  
  227.     if (r < 0.5)
  228.         sound (self, CHAN_VOICE, "enforcer/pain1.wav", 1, ATTN_NORM);
  229.     else
  230.         sound (self, CHAN_VOICE, "enforcer/pain2.wav", 1, ATTN_NORM);
  231.  
  232.     if (r < 0.2)
  233.     {
  234.         self.pain_finished = time + 1;
  235.         enf_paina1 ();
  236.     }
  237.     else if (r < 0.4)
  238.     {
  239.         self.pain_finished = time + 1;
  240.         enf_painb1 ();
  241.     }
  242.     else if (r < 0.7)
  243.     {
  244.         self.pain_finished = time + 1;
  245.         enf_painc1 ();
  246.     }
  247.     else
  248.     {
  249.         self.pain_finished = time + 2;
  250.         enf_paind1 ();
  251.     }
  252. };
  253.  
  254. //============================================================================
  255.  
  256.  
  257.  
  258.  
  259. void()   enf_die1 =[ $death1, enf_die2 ] {};
  260. void()    enf_die2    =[    $death2,    enf_die3    ] {};
  261. void()    enf_die3    =[    $death3,    enf_die4    ]
  262. {self.solid = SOLID_NOT;self.ammo_cells = 5;DropBackpack();};
  263. void()    enf_die4    =[    $death4,    enf_die5    ] {ai_forward(14);};
  264. void()    enf_die5    =[    $death5,    enf_die6    ] {ai_forward(2);};
  265. void()    enf_die6    =[    $death6,    enf_die7    ] {};
  266. void()    enf_die7    =[    $death7,    enf_die8    ] {};
  267. void()    enf_die8    =[    $death8,    enf_die9    ] {};
  268. void()    enf_die9    =[    $death9,    enf_die10    ] {ai_forward(3);};
  269. void()    enf_die10    =[    $death10,    enf_die11    ] {ai_forward(5);};
  270. void()    enf_die11    =[    $death11,    enf_die12    ] {ai_forward(5);};
  271. void()    enf_die12    =[    $death12,    enf_die13    ] {ai_forward(5);};
  272. void()    enf_die13    =[    $death13,    enf_die14    ] {};
  273. void()   enf_die14   =[ $death14,   enf_die14   ]
  274.    {
  275.    };
  276.  
  277. void()   enf_fdie1   =[ $fdeath1,   enf_fdie2   ] {};
  278. void()    enf_fdie2    =[    $fdeath2,    enf_fdie3    ] {};
  279. void()    enf_fdie3    =[    $fdeath3,    enf_fdie4    ]
  280. {self.solid = SOLID_NOT;self.ammo_cells = 5;DropBackpack();};
  281. void()    enf_fdie4    =[    $fdeath4,    enf_fdie5    ] {};
  282. void()    enf_fdie5    =[    $fdeath5,    enf_fdie6    ] {};
  283. void()    enf_fdie6    =[    $fdeath6,    enf_fdie7    ] {};
  284. void()    enf_fdie7    =[    $fdeath7,    enf_fdie8    ] {};
  285. void()    enf_fdie8    =[    $fdeath8,    enf_fdie9    ] {};
  286. void()    enf_fdie9    =[    $fdeath9,    enf_fdie10    ] {};
  287. void()    enf_fdie10    =[    $fdeath10,    enf_fdie11    ] {};
  288. void()   enf_fdie11  =[ $fdeath11,  enf_fdie11  ]
  289.    {
  290.    };
  291.  
  292.  
  293. void() enf_die =
  294. {
  295. // check for gib
  296.     if (self.health < -35)
  297.     {
  298.         sound (self, CHAN_VOICE, "player/udeath.wav", 1, ATTN_NORM);
  299.         ThrowHead ("progs/h_mega.mdl", self.health);
  300.         ThrowGib ("progs/gib1.mdl", self.health);
  301.         ThrowGib ("progs/gib2.mdl", self.health);
  302.         ThrowGib ("progs/gib3.mdl", self.health);
  303.         return;
  304.     }
  305.  
  306. // regular death
  307.     sound (self, CHAN_VOICE, "enforcer/death1.wav", 1, ATTN_NORM);
  308.    if (random() > 0.5)
  309.         enf_die1 ();
  310.     else
  311.         enf_fdie1 ();
  312. };
  313.  
  314.  
  315. /*QUAKED monster_enforcer (1 0 0) (-16 -16 -24) (16 16 40) Ambush
  316.  
  317. */
  318. void() monster_enforcer =
  319. {
  320.     if (deathmatch)
  321.     {
  322.         remove(self);
  323.         return;
  324.     }
  325.     precache_model2 ("progs/enforcer.mdl");
  326.     precache_model2 ("progs/h_mega.mdl");
  327.     precache_model2 ("progs/laser.mdl");
  328.  
  329.     precache_sound2 ("enforcer/death1.wav");
  330.     precache_sound2 ("enforcer/enfire.wav");
  331.     precache_sound2 ("enforcer/enfstop.wav");
  332.     precache_sound2 ("enforcer/idle1.wav");
  333.     precache_sound2 ("enforcer/pain1.wav");
  334.     precache_sound2 ("enforcer/pain2.wav");
  335.     precache_sound2 ("enforcer/sight1.wav");
  336.     precache_sound2 ("enforcer/sight2.wav");
  337.     precache_sound2 ("enforcer/sight3.wav");
  338.     precache_sound2 ("enforcer/sight4.wav");
  339.  
  340.     self.solid = SOLID_SLIDEBOX;
  341.     self.movetype = MOVETYPE_STEP;
  342.  
  343.     setmodel (self, "progs/enforcer.mdl");
  344.  
  345.     setsize (self, '-16 -16 -24', '16 16 40');
  346.     self.health = 80;
  347.  
  348.     self.th_stand = enf_stand1;
  349.     self.th_walk = enf_walk1;
  350.     self.th_run = enf_run1;
  351.     self.th_pain = enf_pain;
  352.     self.th_die = enf_die;
  353.     self.th_missile = enf_atk1;
  354.  
  355.     walkmonster_start();
  356. };
  357.